% V20210224 - 7.7.11 inline [5]

INCLUDE "GW.bas"

mypage = GW_NEW_PAGE()

ARRAY.LOAD transition$[], ">Pop", "Fade", "Flip", "Turn", ~
 "Flow", "Slidefade", "Slide", "Slideup", "Slidedown", ~
 "None"
GW_USE_THEME_CUSTO_ONCE("inline")
sb = GW_ADD_SELECTBOX (mypage, "Transition type:", transition$[])
GW_RENDER(mypage)

% Wait for user action.
GW_WAIT_ACTION$()

END "End of 'inline' example."